home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Floppyshop 2
/
Floppyshop - 2.zip
/
Floppyshop - 2.iso
/
diskmags
/
5791-.end
/
dmg-6260
/
source
/
psg6.bas
(
.txt
)
< prev
next >
Wrap
Atari STOS Basic
|
1993-06-26
|
7KB
|
34 lines
1 GOSUB
100 REM READ PSG 6
101 UNKNOWN OP: 0x3A
102 VARNAME
103 FOR
104 NEXT
105 IF
106 IF
107 IF
110 COLOUR
111 COLOUR
112 COLOUR
119 RETURN
2 DIM
3 RESTORE
4 DATA
45 DREG
46 GOSUB
47 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
48 REM MAIN LOOP
49 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
5 DATA
50 PEN
50000 MODE
50009 RETURN
51 PEN
53 VARNAME
59 REM LOOP
6 DATA
60 GOSUB
90 VARNAME
98 IF
99 GOTO